﻿Imports System.Transactions
Imports CondorTravel.BE
Imports CondorTravel.DALC

Public Class EstadoDocBC
    Public Function EstadoListar(ByVal objEstaDoc As EstadoDocBE) As List(Of EstadoDocBE)
        Try
            Dim listEstadoDocBE As List(Of EstadoDocBE) = Nothing
            Dim objEstadoDocDALC As EstadoDocDALC = Nothing

            objEstadoDocDALC = New EstadoDocDALC
            listEstadoDocBE = New List(Of EstadoDocBE)()
            listEstadoDocBE = objEstadoDocDALC.ListarEstados(objEstaDoc)

            Return listEstadoDocBE

        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Information)
            Return Nothing
        End Try
    End Function
End Class
